프로젝트에서 view source 하셔서

-----------------------------------

var

  mHandle : THandle;

begin

  Application.Initialize;

  mHandle := CreateMutex(nil, True, PChar('noDuplicate'));

  if GetLastError = ERROR_ALREADY_EXISTS then begin

    MessageBox(0, PChar('프로그램이 이미 실행중입니다.'), '중복실행', MB_OK or MB_ICONINFORMATION);

    halt;

  end;

------------------------------------------------

추가해보세요.



────────────────────────────────────────────────

▷ 럭셔리브레인님께서 작성하신 내용입니다.

────────────────────────────────────────────────



>> 예를 들어 A.exe가 윈도우 프로세스에 올라와 있으면 "a.exe 가 이미 구동중입니다." 라는 메세지 뿌리면서 프로그램이 구동

>>

>> 안되게 할수 있는 방법 알고 싶습니다~

>>

>> 덧붙여 델파이 2007버전 관련 서적 알려주세요. 서점가를 아무리 뒤져봐도 책이 보이질 않네요

>>

>> 습도 높고 더운날씨에 다들 건강 유의 하시고 좋은 하루되세요~